#!/usr/bin/perl
my $os = $^O;
print "Current OS is $os\n";

if($os eq "linux"){
  $user = $ENV{'USER'};
  print "Current USER is $user\n";

}

if($os eq "FreeBSD"){
}


